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SRR ERE EAR AEE AERA AEA EERE eee 


SYSSER.REQ = definitions file for calling system services 
Version v02-000 


COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGHTS RESERVED. 


THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED 
ACCORDANC H R CE H My 

OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY 

TRANSFERRED. 

THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 

oreeonat tine NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 


DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR _ RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 


PATCH Version V04-000, Carol Peters, September 20, 1977 
PATCH VERSION X01.06, KATHLEEN MORSE, 13-OCT-77 


SWITCHES LIST (SOURCE); 


EXTERNAL ROUTINE 
PAT$fao_out; ! formats a Line and outputs to the terminal 


SWITCHES LIST (NOSOURCE); 
MACRO 


$fao_stg count (string) = 
++ 


i $fao_stg_count makes a counted byte string out of an ASCII string. 
! This macro is useful to transform an fao control string into the 
! address of such a string, whose first byte contains the length of 


! the string in bytes. 


UPLIT BYTE (XCHARCOUNT (string), %ASCII string)%, 
$fao_tt_out (ctl_string) (] = 
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SRR RRR EEE AREA EERE EEE EAE E EERE eee 
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$fao_tt_out constructs a call to fao with a control string, 


! and some arguments to the control string. 


g . 
' This formatted string is then output to the output device. 


PAT$fao_out ($fao_stg_count (ctl_string), ZREMAINING)%, 


1 
SYSSER.REQ;1 16-SEP-1984 16:53:19. 74 Page 2 


$fao_tt_cas_out (ctl string_adr) (] = 


! $fao_tt_cas_out constructs a call to fao with the address of a 
' contfol“string, and some arguments to the control string. This formatted 
string is then output to the terminal. 


PAT$fao_out (ctl_string_adr, %REMAINING)%, 
$fao_tt_ct_out (ctl string) = 
14% 


i $fao_tt_ct_out constructs a call to fao with a control string. 
' This formatted string is then output to the terminal. 


PAT$fao_out (S$fao_stg_count (ctl_string))%, 
$fao_tt_ca_out (ctl_string_adr) = 
HE 
! $fao_tt_ca_out calls fao with the address of a 
' control string. This formatted string is then output 
! to the output device. 


PAT$fao_out (ctl_string_adr)%; 


i SYSSER.REQ = Last Line 
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